home *** CD-ROM | disk | FTP | other *** search
- page ,132
-
- cseg segment 'code'
- assume cs:cseg
- initmem proc far
- push ds ; Linkage.
- xor ax,ax
- push ax
-
- cld ; Set auto incr for string ops.
- mov ax,40h
- mov ds,ax
- mov ax,ds:[72h]
- cmp ax,1234h
-
-
- mov cx,544/16*1024
- mov es,cx ; ES = 544kb.
- mov cx,32*1024 ; Initialize 32kb.
- xor di,di ; Offset into ES at which to start.
- rep stosb ; Init memory.
-
- ret ; Return to caller.
- initmem endp
- cseg ends
- end